home *** CD-ROM | disk | FTP | other *** search
- $numdevs{$name} = 4; $stddevs{$name} = "^(.*)\$";
-
- $generate{$name} = sub {
- $i == 0 && &$SymLink("/proc/self/fd", "fd");
- $i == 1 && &$SymLink("fd/0", "stdin");
- $i == 2 && &$SymLink("fd/1", "stdout");
- $i == 3 && &$SymLink("fd/2", "stderr");
- };
-